Prime numbers within Range in VB.Net